home *** CD-ROM | disk | FTP | other *** search
/ MacFormat 1997 February / macformat-047.iso / Shareware Plus / Utilities / ICeTEe 2 folder / source / ICeTEe AddrsTable.c < prev    next >
Encoding:
C/C++ Source or Header  |  1996-08-29  |  2.1 KB  |  69 lines  |  [TEXT/CWIE]
  1. /*    NAME:
  2.         ICeTEe AddrsTable.c
  3.  
  4.     WRITTEN BY:
  5.         Michael Schürig
  6.  
  7.     DESCRIPTION:
  8.         This file contains a a code resource that acts as a Gestalt Selector
  9.         function to be installed as an address table. When called, it will
  10.         return the address of its internal address table.
  11.  
  12.     ___________________________________________________________________________
  13. */
  14. //=============================================================================
  15. //        Include files                                                                     
  16. //-----------------------------------------------------------------------------
  17. #include "A4Stuff.h"
  18. #include "SetupA4.h"
  19. #include "ICeTEe AddrsTable.h"
  20.  
  21.  
  22. //=============================================================================
  23. //        Function prototypes                                                                     
  24. //-----------------------------------------------------------------------------
  25. pascal OSErr main(OSType theSelector, long *theResponse);
  26.  
  27.  
  28. //=============================================================================
  29. //        Global variables                                                                 
  30. //-----------------------------------------------------------------------------
  31. ICeTEeAddressTable        gTheAddressTable;
  32.  
  33.  
  34. //=============================================================================
  35. //        main : Entry point to our Gestalt Selector function.                                                                 
  36. //-----------------------------------------------------------------------------
  37. //        Note :    When called, we return the address of our address table
  38. //                structure.
  39. //-----------------------------------------------------------------------------
  40. pascal OSErr main(OSType theSelector, long *theResponse)
  41. {
  42.     long            oldA4;
  43. #pragma unused(theSelector)
  44.  
  45.     // Set up A4 to access our globals
  46. #ifndef powerc
  47.     oldA4 = SetCurrentA4();
  48. #endif
  49.  
  50. #if qDebug >= 3
  51.     DebugStr("\pAddress Table entered");
  52. #endif
  53.  
  54.     // Return the address of gTheAddressTable. We treat theResponse as a pointer
  55.     // to a variable that's a pointer to an address table, and write to it
  56.     // accordingly.
  57.     *theResponse = (long) &gTheAddressTable;
  58.  
  59. #if qDebug >= 3
  60.     DebugStr("\pAddress Table exit");
  61. #endif
  62.  
  63.     // Restore A4 and return
  64. #ifndef powerc
  65.     SetA4(oldA4);
  66. #endif
  67.     return(noErr);
  68. }
  69.